* lisp/emacs-lisp/comp.el (comp-limplify-lap-inst): Opencode byte-not.

diff --git a/lisp/emacs-lisp/comp.el b/lisp/emacs-lisp/comp.el
index eef63b52c44588e5c12f6ec5d5ac19823d8ce734..ad09210d8dd644991a505521256fb5d72f395e0a 100644 (file)
--- a/lisp/emacs-lisp/comp.el
+++ b/lisp/emacs-lisp/comp.el
@@ -1446,7 +1446,9 @@ the annotation emission."
       (byte-listp auto)
       (byte-eq auto)
       (byte-memq auto)
-      (byte-not null)
+      (byte-not
+       (comp-emit-set-call (comp-call 'eq (comp-slot-n (comp-sp))
+                                      (make-comp-mvar :constant nil))))
       (byte-car auto)
       (byte-cdr auto)
       (byte-cons auto)